home *** CD-ROM | disk | FTP | other *** search
/ BMUG PD-ROM BV3 / BMUG PD-ROM Version BV3 (CDRM1097900).iso / HyperCard / Games / Mathter Mind / Mathter Mind / card_2992.txt < prev    next >
Text File  |  1990-09-30  |  16KB  |  730 lines
  1. -- card: 2992 from stack: in
  2. -- bmap block id: 3508
  3. -- flags: 0000
  4. -- background id: 2694
  5. -- name: 
  6.  
  7.  
  8. -- part 1 (field)
  9. -- low flags: 01
  10. -- high flags: 2000
  11. -- rect: left=175 top=29 right=93 bottom=267
  12. -- title width / last selected line: 0
  13. -- icon id / first selected line: 0 / 0
  14. -- text alignment: 65535
  15. -- font id: 2118
  16. -- text size: 48
  17. -- style flags: 2304
  18. -- line height: 64
  19. -- part name: Field 1
  20.  
  21.  
  22. -- part 2 (field)
  23. -- low flags: 01
  24. -- high flags: 2000
  25. -- rect: left=176 top=83 right=147 bottom=268
  26. -- title width / last selected line: 0
  27. -- icon id / first selected line: 0 / 0
  28. -- text alignment: 65535
  29. -- font id: 2118
  30. -- text size: 48
  31. -- style flags: 2304
  32. -- line height: 64
  33. -- part name: Field 2
  34.  
  35.  
  36. -- part 3 (field)
  37. -- low flags: 01
  38. -- high flags: 2000
  39. -- rect: left=164 top=95 right=158 bottom=209
  40. -- title width / last selected line: 0
  41. -- icon id / first selected line: 0 / 0
  42. -- text alignment: 1
  43. -- font id: 21
  44. -- text size: 36
  45. -- style flags: 2304
  46. -- line height: 48
  47. -- part name: Field 3
  48.  
  49.  
  50. -- part 4 (button)
  51. -- low flags: 00
  52. -- high flags: 8003
  53. -- rect: left=375 top=294 right=315 bottom=481
  54. -- title width / last selected line: 0
  55. -- icon id / first selected line: 0 / 0
  56. -- text alignment: 1
  57. -- font id: 0
  58. -- text size: 12
  59. -- style flags: 0
  60. -- line height: 16
  61. -- part name: Let's Do Math
  62. ----- HyperTalk script -----
  63. on mouseUp
  64.   set numberFormat to 0.00
  65.   hide cd fld "Let's"
  66.   hide cd fld "Well Done"
  67.   hide cd fld "Oops"
  68.   put empty into cd fld "Field 3"
  69.   put empty into cd fld "Answer"
  70.   put empty into cd fld "Answer1"
  71.   get the random of 25
  72.   put it into cd fld "Field 1"
  73.   get the random of 8
  74.   put it into cd fld "Field 2"
  75.   show cd btn "ADDITION"
  76.   show cd btn "SUBTRACTION"
  77.   SHOW CD BTN "DIVISION"
  78.   SHOW CD BTN "MULTIPLICATION"
  79.   play "Bleep"
  80. end mouseUp
  81.  
  82.  
  83.  
  84. -- part 8 (field)
  85. -- low flags: 01
  86. -- high flags: 2000
  87. -- rect: left=36 top=157 right=225 bottom=273
  88. -- title width / last selected line: 0
  89. -- icon id / first selected line: 0 / 0
  90. -- text alignment: 65535
  91. -- font id: 2118
  92. -- text size: 48
  93. -- style flags: 2304
  94. -- line height: 64
  95. -- part name: Answer
  96. ----- HyperTalk script -----
  97. on mouseUp
  98.   add "1" to cd fld "Right"
  99.   hide cd fld "Answer1"
  100.   show cd fld "Well Done"
  101.   set numberFormat to 0
  102.   get cd fld "Right"
  103.   divide it by cd fld "Tried"
  104.   multiply it by 100
  105.   put it into cd fld "Score"
  106.  
  107. end mouseUp
  108.  
  109.  
  110. -- part 10 (button)
  111. -- low flags: 80
  112. -- high flags: 8003
  113. -- rect: left=343 top=101 right=119 bottom=477
  114. -- title width / last selected line: 0
  115. -- icon id / first selected line: 0 / 0
  116. -- text alignment: 1
  117. -- font id: 0
  118. -- text size: 12
  119. -- style flags: 0
  120. -- line height: 16
  121. -- part name: ADDITION
  122. ----- HyperTalk script -----
  123. on mouseUp
  124.   set numberFormat to 0
  125.   hide cd fld "Answer"
  126.   add "1" to cd fld "Tried"
  127.   put empty into cd fld "Answer"
  128.   put empty into cd fld "Answer1"
  129.   hide cd fld "Well Done"
  130.   hide cd fld "Oops"
  131.   hide me
  132.   put "+" into cd fld "Field 3"
  133.   get cd fld "Field 1"
  134.   add cd fld "Field 2" to it
  135.   put it into cd fld "Answer"
  136.   hide cd fld "Answer"
  137.   show cd fld "Answer1"
  138.   show cd btn "‚àö +"
  139.   select text of cd fld "Answer1"
  140.  
  141. end mouseUp
  142.  
  143.  
  144.  
  145. -- part 11 (button)
  146. -- low flags: 80
  147. -- high flags: 8003
  148. -- rect: left=344 top=77 right=94 bottom=477
  149. -- title width / last selected line: 0
  150. -- icon id / first selected line: 0 / 0
  151. -- text alignment: 1
  152. -- font id: 0
  153. -- text size: 12
  154. -- style flags: 0
  155. -- line height: 16
  156. -- part name: SUBTRACTION
  157. ----- HyperTalk script -----
  158. on mouseUp
  159.   set numberFormat to 0
  160.   hide cd fld "Answer"
  161.   add "1" to cd fld "Tried"
  162.   put empty into cd fld "Answer"
  163.   put empty into cd fld "Answer1"
  164.   hide cd fld "Well Done"
  165.   hide cd fld "Oops"
  166.   hide me
  167.   put "-" into cd fld "Field 3"
  168.   get cd fld "Field 1"
  169.   subtract cd fld "Field 2" from it
  170.   put it into cd fld "Answer"
  171.   show cd btn "‚àö -"
  172.   select text of cd fld "Answer1"
  173. end mouseUp
  174.  
  175.  
  176.  
  177. -- part 12 (button)
  178. -- low flags: 80
  179. -- high flags: 8003
  180. -- rect: left=343 top=53 right=70 bottom=476
  181. -- title width / last selected line: 0
  182. -- icon id / first selected line: 0 / 0
  183. -- text alignment: 1
  184. -- font id: 0
  185. -- text size: 12
  186. -- style flags: 0
  187. -- line height: 16
  188. -- part name: DIVISION
  189. ----- HyperTalk script -----
  190. on mouseUp
  191.   set numberFormat to 0
  192.   hide cd fld "Answer"
  193.   add "1" to cd fld "Tried"
  194.   set numberFormat to 0.0
  195.   put empty into cd fld "Answer"
  196.   put empty into cd fld "Answer1"
  197.   hide cd fld "Well Done"
  198.   hide cd fld "Oops"
  199.   hide me
  200.   put "√∑" into cd fld "Field 3"
  201.   get cd fld "Field 1"
  202.   divide it by cd fld "Field 2"
  203.   put it into cd fld "Answer"
  204.   show cd btn "‚àö √∑"
  205.   select text of cd fld "Answer1"
  206. end mouseUp
  207.  
  208.  
  209.  
  210. -- part 13 (button)
  211. -- low flags: 80
  212. -- high flags: 8003
  213. -- rect: left=343 top=30 right=47 bottom=476
  214. -- title width / last selected line: 0
  215. -- icon id / first selected line: 0 / 0
  216. -- text alignment: 1
  217. -- font id: 0
  218. -- text size: 12
  219. -- style flags: 0
  220. -- line height: 16
  221. -- part name: MULTIPLICATION
  222. ----- HyperTalk script -----
  223. on mouseUp
  224.   set numberFormat to 0
  225.   hide cd fld "Answer"
  226.   add "1" to cd fld "Tried"
  227.   put empty into cd fld "Answer"
  228.   put empty into cd fld "Answer1"
  229.   hide cd fld "Well Done"
  230.   hide cd fld "Oops"
  231.   hide me
  232.   put "x" into cd fld "Field 3"
  233.   get cd fld "Field 1"
  234.   multiply it by cd fld "Field 2"
  235.   put it into cd fld "Answer"
  236.   show cd btn "‚àö x"
  237.   select text of cd fld "Answer1"
  238. end mouseUp
  239.  
  240.  
  241.  
  242. -- part 14 (button)
  243. -- low flags: 00
  244. -- high flags: 0000
  245. -- rect: left=24 top=278 right=324 bottom=61
  246. -- title width / last selected line: 65535
  247. -- icon id / first selected line: -15651 / 49885
  248. -- text alignment: 1
  249. -- font id: 0
  250. -- text size: 12
  251. -- style flags: 0
  252. -- line height: 16
  253. -- part name: 
  254. ----- HyperTalk script -----
  255. on mouseUp
  256.   answer "Are You Sure You Want To Quit" with "Yes" or "No"
  257.   if it is "No" then
  258.     visual effect zoom close slowly
  259.     go to this card
  260.     show cd fld "Let's"
  261.   else
  262.     put empty into cd fld "Answer"
  263.     put empty into cd fld "Answer1"
  264.     put empty into cd fld "Field 1"
  265.     put empty into cd fld "Field 2"
  266.     put empty into cd fld "Field 3"
  267.     put empty into cd fld "Right"
  268.     put empty into cd fld "Wrong"
  269.     put empty into cd fld "Score"
  270.     put empty into cd fld "Tried"
  271.     hide cd btn "ADDITION"
  272.     hide cd btn "SUBTRACTION"
  273.     hide cd btn "DIVISION"
  274.     hide cd btn "MULTIPLICATION"
  275.     hide cd fld "Oops"
  276.     hide cd fld "Well Done"
  277.     show cd fld "Let's"
  278.     doMenu "Compact Stack"
  279.     doMenu "Quit HyperCard"
  280.   end if
  281. end mouseUp
  282.  
  283.  
  284.  
  285. -- part 15 (field)
  286. -- low flags: 01
  287. -- high flags: 2000
  288. -- rect: left=27 top=26 right=50 bottom=153
  289. -- title width / last selected line: 0
  290. -- icon id / first selected line: 0 / 0
  291. -- text alignment: 0
  292. -- font id: 3
  293. -- text size: 12
  294. -- style flags: 2304
  295. -- line height: 16
  296. -- part name: 
  297.  
  298.  
  299. -- part 16 (field)
  300. -- low flags: 01
  301. -- high flags: 2000
  302. -- rect: left=24 top=74 right=98 bottom=155
  303. -- title width / last selected line: 0
  304. -- icon id / first selected line: 0 / 0
  305. -- text alignment: 0
  306. -- font id: 3
  307. -- text size: 12
  308. -- style flags: 2304
  309. -- line height: 16
  310. -- part name: 
  311.  
  312.  
  313. -- part 17 (field)
  314. -- low flags: 01
  315. -- high flags: 2000
  316. -- rect: left=31 top=51 right=79 bottom=147
  317. -- title width / last selected line: 0
  318. -- icon id / first selected line: 0 / 0
  319. -- text alignment: 1
  320. -- font id: 3
  321. -- text size: 14
  322. -- style flags: 2304
  323. -- line height: 18
  324. -- part name: Right
  325.  
  326.  
  327. -- part 18 (field)
  328. -- low flags: 01
  329. -- high flags: 2000
  330. -- rect: left=31 top=105 right=133 bottom=147
  331. -- title width / last selected line: 0
  332. -- icon id / first selected line: 0 / 0
  333. -- text alignment: 1
  334. -- font id: 3
  335. -- text size: 14
  336. -- style flags: 2304
  337. -- line height: 18
  338. -- part name: Wrong
  339.  
  340.  
  341. -- part 19 (field)
  342. -- low flags: 00
  343. -- high flags: 2002
  344. -- rect: left=156 top=219 right=282 bottom=275
  345. -- title width / last selected line: 0
  346. -- icon id / first selected line: 0 / 0
  347. -- text alignment: 65535
  348. -- font id: 2118
  349. -- text size: 48
  350. -- style flags: 256
  351. -- line height: 64
  352. -- part name: Answer1
  353. ----- HyperTalk script -----
  354. on mouseUp
  355.   set lockScreen to true
  356.   add "1" to cd fld "Wrong"
  357.   hide cd fld "Which"
  358.   show cd fld "Oops"
  359.   hide cd fld "Answer"
  360.   set numberformat to 0
  361.   get cd fld "Right"
  362.   divide it by cd fld "Tried"
  363.   multiply it by 100
  364.   put it into cd fld "Score"
  365.  
  366. end mouseUp
  367.  
  368.  
  369. -- part 21 (field)
  370. -- low flags: 81
  371. -- high flags: 2000
  372. -- rect: left=343 top=121 right=201 bottom=471
  373. -- title width / last selected line: 0
  374. -- icon id / first selected line: 0 / 0
  375. -- text alignment: 1
  376. -- font id: 1053
  377. -- text size: 24
  378. -- style flags: 6400
  379. -- line height: 32
  380. -- part name: Well Done
  381.  
  382.  
  383. -- part 22 (field)
  384. -- low flags: 81
  385. -- high flags: 2000
  386. -- rect: left=346 top=136 right=174 bottom=468
  387. -- title width / last selected line: 0
  388. -- icon id / first selected line: 0 / 0
  389. -- text alignment: 1
  390. -- font id: 1053
  391. -- text size: 24
  392. -- style flags: 6400
  393. -- line height: 32
  394. -- part name: Oops
  395.  
  396.  
  397. -- part 23 (field)
  398. -- low flags: 01
  399. -- high flags: 2000
  400. -- rect: left=92 top=293 right=317 bottom=234
  401. -- title width / last selected line: 0
  402. -- icon id / first selected line: 0 / 0
  403. -- text alignment: 0
  404. -- font id: 3
  405. -- text size: 12
  406. -- style flags: 2304
  407. -- line height: 16
  408. -- part name: 
  409.  
  410.  
  411. -- part 24 (field)
  412. -- low flags: 01
  413. -- high flags: 2000
  414. -- rect: left=239 top=291 right=317 bottom=312
  415. -- title width / last selected line: 0
  416. -- icon id / first selected line: 0 / 0
  417. -- text alignment: 1
  418. -- font id: 3
  419. -- text size: 14
  420. -- style flags: 2304
  421. -- line height: 18
  422. -- part name: Tried
  423.  
  424.  
  425. -- part 25 (field)
  426. -- low flags: 01
  427. -- high flags: 2000
  428. -- rect: left=338 top=209 right=233 bottom=480
  429. -- title width / last selected line: 0
  430. -- icon id / first selected line: 0 / 0
  431. -- text alignment: 1
  432. -- font id: 3
  433. -- text size: 12
  434. -- style flags: 2304
  435. -- line height: 16
  436. -- part name: 
  437.  
  438.  
  439. -- part 26 (field)
  440. -- low flags: 01
  441. -- high flags: 2000
  442. -- rect: left=360 top=233 right=266 bottom=423
  443. -- title width / last selected line: 0
  444. -- icon id / first selected line: 0 / 0
  445. -- text alignment: 0
  446. -- font id: 3
  447. -- text size: 20
  448. -- style flags: 2304
  449. -- line height: 26
  450. -- part name: Score
  451.  
  452.  
  453. -- part 27 (button)
  454. -- low flags: 00
  455. -- high flags: 8003
  456. -- rect: left=316 top=296 right=314 bottom=372
  457. -- title width / last selected line: 0
  458. -- icon id / first selected line: 0 / 0
  459. -- text alignment: 1
  460. -- font id: 0
  461. -- text size: 12
  462. -- style flags: 0
  463. -- line height: 16
  464. -- part name: Reset
  465. ----- HyperTalk script -----
  466. on mouseUp
  467.   answer "Are You Sure You Want To Reset Everything?" with "Yes" or "No"
  468.   if it is "No" then
  469.     visual effect zoom close slowly
  470.     go to this card
  471.   else
  472.     hide cd fld "Oops"
  473.     hide cd fld "Well Done"
  474.     hide cd btn "MULTIPLICATION"
  475.     hide cd btn "DIVISION"
  476.     hide cd btn "SUBTRACTION"
  477.     hide cd btn "ADDITION"
  478.     put empty into cd fld "Answer"
  479.     put empty into cd fld "Answer1"
  480.     put empty into cd fld "Field 1"
  481.     put empty into cd fld "Field 2"
  482.     put empty into cd fld "Right"
  483.     put empty into cd fld "Wrong"
  484.     put empty into cd fld "Tried"
  485.     put empty into cd fld "Score"
  486.     show cd fld "Let's"
  487.   end if
  488. end mouseUp
  489.  
  490.  
  491.  
  492. -- part 28 (field)
  493. -- low flags: 01
  494. -- high flags: 2000
  495. -- rect: left=423 top=233 right=262 bottom=475
  496. -- title width / last selected line: 0
  497. -- icon id / first selected line: 0 / 0
  498. -- text alignment: 0
  499. -- font id: 3
  500. -- text size: 20
  501. -- style flags: 2304
  502. -- line height: 26
  503. -- part name: Score
  504.  
  505.  
  506. -- part 29 (field)
  507. -- low flags: 01
  508. -- high flags: 2000
  509. -- rect: left=31 top=223 right=279 bottom=151
  510. -- title width / last selected line: 0
  511. -- icon id / first selected line: 0 / 0
  512. -- text alignment: 0
  513. -- font id: 3
  514. -- text size: 12
  515. -- style flags: 2304
  516. -- line height: 16
  517. -- part name: 
  518.  
  519.  
  520. -- part 31 (field)
  521. -- low flags: 01
  522. -- high flags: 2002
  523. -- rect: left=314 top=266 right=293 bottom=480
  524. -- title width / last selected line: 0
  525. -- icon id / first selected line: 0 / 0
  526. -- text alignment: 1
  527. -- font id: 20
  528. -- text size: 10
  529. -- style flags: 0
  530. -- line height: 10
  531. -- part name: Let's
  532.  
  533.  
  534. -- part 35 (button)
  535. -- low flags: 00
  536. -- high flags: 0000
  537. -- rect: left=184 top=182 right=197 bottom=250
  538. -- title width / last selected line: 0
  539. -- icon id / first selected line: 0 / 0
  540. -- text alignment: 1
  541. -- font id: 0
  542. -- text size: 12
  543. -- style flags: 0
  544. -- line height: 16
  545. -- part name: 
  546. ----- HyperTalk script -----
  547. on mouseUp
  548.   show cd btn "Check Answer"
  549. end mouseUp
  550.  
  551.  
  552.  
  553. -- part 36 (button)
  554. -- low flags: 80
  555. -- high flags: 8003
  556. -- rect: left=372 top=53 right=70 bottom=442
  557. -- title width / last selected line: 0
  558. -- icon id / first selected line: 0 / 0
  559. -- text alignment: 1
  560. -- font id: 0
  561. -- text size: 12
  562. -- style flags: 0
  563. -- line height: 16
  564. -- part name: √ ÷
  565. ----- HyperTalk script -----
  566. on mouseUp
  567.   hide cd btn "‚àö √∑"
  568.   show cd fld "Answer"
  569.   get cd fld "Answer1"
  570.   if it = cd fld "Answer" then
  571.     show cd fld "Well Done"
  572.     play "Beethoven"
  573.     add "1" to cd fld "Right"
  574.   else
  575.     show cd fld "Oops"
  576.     play "Boingg.1"
  577.     add "1" to cd fld "Wrong"
  578.     set numberFormat to 0
  579.   end if
  580.   get cd fld "Right"
  581.   divide it by cd fld "Tried"
  582.   multiply it by 100
  583.   put it into cd fld "Score"
  584.  
  585. end mouseUp
  586.  
  587.  
  588.  
  589. -- part 37 (button)
  590. -- low flags: 80
  591. -- high flags: 8003
  592. -- rect: left=372 top=30 right=47 bottom=442
  593. -- title width / last selected line: 0
  594. -- icon id / first selected line: 0 / 0
  595. -- text alignment: 1
  596. -- font id: 0
  597. -- text size: 12
  598. -- style flags: 0
  599. -- line height: 16
  600. -- part name: √ x
  601. ----- HyperTalk script -----
  602. on mouseUp
  603.   hide me
  604.   show cd fld "Answer"
  605.   get cd fld "Answer1"
  606.   if it = cd fld "Answer" then
  607.     show cd fld "Well Done"
  608.     play "Beethoven"
  609.     add "1" to cd fld "Right"
  610.   else
  611.     show cd fld "Oops"
  612.     play "Boingg.1"
  613.     add "1" to cd fld "Wrong"
  614.     set numberFormat to 0
  615.   end if
  616.   get cd fld "Right"
  617.   divide it by cd fld "Tried"
  618.   multiply it by 100
  619.   put it into cd fld "Score"
  620. end mouseUp
  621.  
  622.  
  623. -- part 38 (button)
  624. -- low flags: 80
  625. -- high flags: 8003
  626. -- rect: left=372 top=77 right=94 bottom=442
  627. -- title width / last selected line: 0
  628. -- icon id / first selected line: 0 / 0
  629. -- text alignment: 1
  630. -- font id: 0
  631. -- text size: 12
  632. -- style flags: 0
  633. -- line height: 16
  634. -- part name: √ -
  635. ----- HyperTalk script -----
  636. on mouseUp
  637.   hide cd btn "‚àö -"
  638.   show cd fld "Answer"
  639.   get cd fld "Answer1"
  640.   if it = cd fld "Answer" then
  641.     show cd fld "Well Done"
  642.     play "Beethoven"
  643.     add "1" to cd fld "Right"
  644.   else
  645.     show cd fld "Oops"
  646.     play "Boingg.1"
  647.     add "1" to cd fld "Wrong"
  648.     set numberFormat to 0
  649.   end if
  650.   get cd fld "Right"
  651.   divide it by cd fld "Tried"
  652.   multiply it by 100
  653.   put it into cd fld "Score"
  654.  
  655. end mouseUp
  656.  
  657.  
  658.  
  659. -- part 39 (button)
  660. -- low flags: 80
  661. -- high flags: 8003
  662. -- rect: left=374 top=101 right=118 bottom=444
  663. -- title width / last selected line: 0
  664. -- icon id / first selected line: 0 / 0
  665. -- text alignment: 1
  666. -- font id: 0
  667. -- text size: 12
  668. -- style flags: 0
  669. -- line height: 16
  670. -- part name: √ +
  671. ----- HyperTalk script -----
  672. on mouseUp
  673.   hide cd btn "‚àö +"
  674.   show cd fld "Answer"
  675.   get cd fld "Answer1"
  676.   if it = cd fld "Answer" then
  677.     show cd fld "Well Done"
  678.     play "Beethoven"
  679.     add "1" to cd fld "Right"
  680.   else
  681.     show cd fld "Oops"
  682.     play "Boingg.1"
  683.     add "1" to cd fld "Wrong"
  684.     set numberFormat to 0
  685.   end if
  686.   get cd fld "Right"
  687.   divide it by cd fld "Tried"
  688.   multiply it by 100
  689.   put it into cd fld "Score"
  690.  
  691. end mouseUp
  692.  
  693.  
  694.  
  695. -- part contents for card part 15
  696. ----- text -----
  697. Number Right
  698.  
  699. -- part contents for card part 16
  700. ----- text -----
  701. Number Wrong
  702.  
  703. -- part contents for card part 21
  704. ----- text -----
  705. WELL DONE !
  706.  
  707. -- part contents for card part 22
  708. ----- text -----
  709. OOPS !
  710.  
  711. -- part contents for card part 23
  712. ----- text -----
  713. Problems Tried
  714.  
  715. -- part contents for card part 25
  716. ----- text -----
  717. Your Score
  718.  
  719. -- part contents for card part 28
  720. ----- text -----
  721. %
  722.  
  723. -- part contents for card part 29
  724. ----- text -----
  725. Put Your Answer Here ----------->
  726.  
  727.  
  728. -- part contents for card part 31
  729. ----- text -----
  730. Clicking "Let's Do Math" starts the program or changes the problem.